Nuprl Lemma : SES-implies-ES 0,22

E:Type, eq:EqDecider(E), T:(IdIdType), V:(KndIdType), info:(E(IdId+(IdLnkE)Id)),
pred?:(E(E+Unit)), val:(e:EV(kind(e),loc(e))), whenafter:(x:Ide:ET(loc(e),x)),
p:SESAxioms{i:l}
p:SESAxioms(ETpred?infowhenafter).
ESAxioms(E;T;l,tgV(rcv(l,tg),destination(l));
ESAxioms(e.loc(e);e.kind(e);val;
ESAxioms(when;after;
ESAxioms(l,e. sends(eq;IdLnkDeq;pred?;info;val;1of(p);e;l);e.sender(e);e.
ESAxioms(index(eq;IdLnkDeq;pred?;info;1of(p);e);
ESAxioms(e.first(e);e.pred(e);
ESAxioms(e,e'e < e'
latex


DefinitionsESAxioms(E;T;M;loc;kind;val;when;after;sends;sender;index;first;pred;causl), P & Q, SESAxioms{i:l}(ETpred?infowhenafter), Id, SWellFounded(R(x;y)), t  T, x:AB(x), P  Q, x,yt(x;y), EqDecider(T), Knd, IdLnk, Unit, loc(e), kind(e), pred(e), s = t, first(e), b, A, A & B, WellFnd{i}(A;x,y.R(x;y)), pred!(e;e'), {T}, False, Prop, sender(e), rcv?(e), P  Q, P  Q, x.A(x), R^*, f(a), Dec(P), xt(x), x f y, i=j, rel_exp(T;R;n), AB, , x:AB(x), #$n, , True, left+right, R^+, e < e', R1 => R2, P  Q, Trans x,y:TE(x;y), SQType(T), , n+m, b, , n-m, isrcv(k), Msg(M), ecase1(e;info;i.f(i);l,e'.g(l;e')), rcv(l,tg), locl(a), tag(k), lnk(k), msg(l;t;v), receives(dE;dL;pred?;info;p;e;l), ||as||, i  j < k, index(dE;dL;pred?;info;p;r), link(e), rcv-from-on(dE;dL;info;e;l;r), {i..j}, T, IdLnkDeq, S  T, S  T, rmsg(info;val;e), destination(l), sends(dE;dL;pred?;info;val;p;e;l), l[i], {x:AB(x) }, s ~ t, type List, ij, eqof(d), (x  l), sends-bound(p;e;l), eventlist(pred?;e), mu(f), rtag(info;e), source(l), Msg_sub(l;M), nil, 1of(t), x before y  l, index(L;x), Top,
Lemmasindex-property1, sends wf, length-map, l before l index, l before filter, l before eventlist, strongwellfounded wf, l index wf, member receives, l before l index le, decidable le, squash wf, Msg sub wf, no-member-sq-nil, lsrc wf, rel plus implies, implies functionality wrt iff, strong-sends-bound-property, sends-bound-property, member eventlist, member filter, eventlist wf, sends-bound wf, l member wf, exists functionality wrt iff, deq property, mu-bound-property+, non neg length, eqof wf, select wf, subtype rel self, assert-rcv-from-on, map select, Msg wf, rcv wf, ldst wf, rmsg wf, idlnk-deq wf, index wf, int seg wf, rcv-from-on wf, receives wf, link wf, length wf1, msg wf, lnk wf, tagof wf, nat wf, isrcv wf, rel plus wf, bool cases, eqtt to assert, bool sq, eqff to assert, iff transitivity, assert of bnot, not functionality wrt iff, assert of eq int, eq int wf, bool wf, bnot wf, rel exp add, rel-rel-plus, wellfounded wf, rel plus strongwellfounded, rel exp monotone, nat plus inc, decidable int equal, rel plus trans, rel plus monotone, cless wf, pred-total, rel star transitivity, rel rel star, false wf, true wf, it wf, le wf, rel exp wf, rel star wf, decidable assert, rcv? wf, sender wf, wellfounded functionality wrt implies, not wf, assert wf, first wf, pred wf, SESAxioms wf, kind wf, loc wf, unit wf, IdLnk wf, Knd wf, Id wf, deq wf, strongwf-implies, pred! wf

origin